home *** CD-ROM | disk | FTP | other *** search
/ Galleria D'arte: Manet / Manet.iso / Dati / Quiz.dxr / 00003_Switch Mouseenter.ls < prev    next >
Encoding:
Text File  |  2000-12-21  |  1.5 KB  |  32 lines

  1. property pCastORIG, pCastFB1, pFB2, pCastFB2, pCUR, pMASK, pCURdn, pMASKdn
  2.  
  3. on getPropertyDescriptionList
  4.   pippo = the memberNum of sprite the currentSpriteNum
  5.   pluto = pippo + 1
  6.   paperino = pippo + 2
  7.   propertyDescriptionList = [#pCastORIG: [#comment: "Numero elemento del Cast di origine del bottone", #format: #integer, #default: pippo], #pCastFB1: [#comment: "Numero elemento del Cast del primo feedback", #format: #integer, #default: pluto], #pFB2: [#comment: "E' previsto il secondo feedback?", #format: #boolean, #default: 0], #pCastFB2: [#comment: "Eventuale numero elemento del Cast del secondo feedback", #format: #integer, #default: paperino], #pCUR: [#comment: "Numero elemento del Cast da utilizzare come cursore", #format: #bitmap, #default: member(100)], #pMASK: [#comment: "Maschera cursore", #format: #bitmap, #default: member(101)], #pCURdn: [#comment: "Numero elemento del Cast da utilizzare come cursore per il mousedown", #format: #bitmap, #default: member(102)], #pMASKdn: [#comment: "Maschera cursore", #format: #bitmap, #default: member(103)]]
  8.   return propertyDescriptionList
  9. end
  10.  
  11. on mouseWithin me
  12.   set the memberNum of sprite the currentSpriteNum to pCastFB1
  13.   cursor(280)
  14.   updateStage()
  15. end
  16.  
  17. on mouseLeave me
  18.   set the memberNum of sprite the currentSpriteNum to pCastORIG
  19.   cursor(-1)
  20.   updateStage()
  21. end
  22.  
  23. on mouseDown me
  24.   cursor(280)
  25.   repeat while the stillDown
  26.     if pFB2 = 1 then
  27.       set the memberNum of sprite the currentSpriteNum to pCastFB2
  28.     end if
  29.     updateStage()
  30.   end repeat
  31. end
  32.